# TODO: Add comment
# 
# Author: Forever
###############################################################################


library(sqldf)
data=read.csv("C:/TempPress.csv")
data_avg = sqldf("select area_id,Month,max(area_name),avg(avg_temp_13) as avg_temp,avg(avg_relative_humidity) as avg_rh,avg(avg_precipitation_24) as avg_preci_24,avg(avg_precipitation_13) as avg_preci_13 from data group by area_id,Month;")
write.csv(data_avg,"C:/AvgTempPress2.csv")

